home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #14 / Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO / netmail / blueq160.zip / SR140.ZIP / UNPACKER.BAT < prev   
DOS Batch File  |  1996-01-08  |  961b  |  46 lines
  1. @echo off
  2. rem unpacker decompressor.exe qwk_fname internals
  3.  
  4. if (%1)==(PKUNZIP) goto PK
  5. if (%1)==(PKUNPAK) goto PK
  6. if (%1)==(ARJ) goto ARJ
  7. if (%1)==(LHA) goto LHA
  8.  
  9. :PK
  10. if (%4)==(CONTROL.DAT) goto PKCTRL
  11. %1 %2 %3 %4 %5 %6 %7 %8 %9
  12. if exist *.up? BlueQWK %3 BW-REP .\ .\ /NoNDX
  13. if exist *.inf BlueQWK %3 BW-QWK .\ .\ /NoNDX
  14. goto END
  15.  
  16. :ARJ
  17. if (%5)==(CONTROL.DAT) goto ARJCTRL
  18. %1 %2 %3 %4 %5 %6 %7 %8 %9
  19. if exist *.up? BlueQWK %4 BW-REP .\ .\ /NoNDX
  20. if exist *.inf BlueQWK %4 BW-QWK .\ .\ /NoNDX
  21. goto END
  22.  
  23. :LHA
  24. if (%5)==(CONTROL.DAT) goto LHACTRL
  25. %1 %2 %3 %4 %5 %6 %7 %8 %9
  26. if exist *.up? BlueQWK %4 BW-REP .\ .\ /NoNDX
  27. if exist *.inf BlueQWK %4 BW-QWK .\ .\ /NoNDX
  28. goto END
  29.  
  30. :PKCTRL
  31. %1 %2 %3 *.INF %5 %6 %7 %8 %9
  32. BlueQWK %3 BW-QWK .\ .\ /NoNDX
  33. goto END
  34.  
  35. :LHACTRL
  36. %1 %2 %3 %4 *.INF %6 %7 %8 %9
  37. BlueQWK %4 BW-QWK .\ .\ /NoNDX
  38. goto END
  39.  
  40. :ARJCTRL
  41. %1 %2 %3 %4 *.INF %6 %7 %8 %9
  42. BlueQWK %4 BW-QWK .\ .\ /NoNDX
  43. goto END
  44.  
  45. :END
  46.